PPPPPPPPPPPP 
PPPPPPPPPPPP 
PPPPPPPPPPPP 
PPP PPP 
PPP PPP 
PPP PPP 


PPP PPP 
PPP PPP 


PPP PPP 
PPPPPPPPPPPP 
PPPPPPPPPPPP 
PPPPPPPPPPPP 


tt tt ot st tt Ht 4 St St Ht Ht Ht SH Ht 

AAAs tH HS HH 

A a A A A tH tt 
AAAAAAOOOAAMAAOO 
AAQMAAAAOAOAMAAAOAO 
NOAAMAAAAAAAAAOOO 


HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHHHHHHHHHHHHHH 
HHHHHHHHHHHHHHH 
HHHHHHHHHHHHHHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 
HHH HHH 


| 
ed 


**F ]LE**1D**PATGEN 
PPPPPPPP AAAAAA TTTTTTITTTT GGGGGGGG EEEEEEEEEE NN 
PPPPPPPP AAAAAA TITTTTTITT GGGGGGGG EEEEEEEEEE NN 
PP PP AA Ak TT GG EE NN 
PP PP AA AR TT GG EE NN 
PP PP AA Ab TT GG EE 
PP PP AA be TT GG EE 
PPPPPPPP Aa Al TT GG EE 
PPPPPPPP Bike oe TT GG EE 
PP AAAAAAAAAA TT GG GGGGGG EE NN 
PP AAAAAAAAAA TT GG GGGGGG EE NN 
PP AA AA TT GG GG EE NN 
PP AA Aa TT GG GG EE NN 
PP AA AA TT GGGGGG EEEEEEEEEE NN 
PP BA Ab TT GGGGGG EEEEEEEEEE NN 
RRRRRRRR EEEEEEEEEE Q0Q000 
RRRRRRRR EEEEEEEEEE QQaaaa 
RR RR EE QQ QQ 
RR RR EE QQ QQ 
RR RR EE QQ QQ 
RR RR EE QQ QQ 
RRRRRRRR EEEEEEEE QQ QQ 
RRRRRRRR EEEEEEEE QQ QQ 
RR RR cE QQ QQ QQ 
RR RR EE QQ QQ QQ 
RR RR EE QQ QQ 
RR RR EE Q0 QQ 
RR RR EEEEEEEEEE QQQg QQ 
RR RR EEEEEEEEEE QQQQ QQ 
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e+ 
} PATGEN.REQ - require file for PATCH facility 


} Version: *v04-000' 
PSPS SESESE SLES LOSES ECCT CECT CTT C TTT TTT TTT TTT AC TALL LTL STALL LLL LLLiTiLii 


‘* COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
i® DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
't ALL RIGHTS RESERVED. 


® 
® 
® 
t 
is THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
is ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE + 
it INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
ie COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
i OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
ie TRANSFERRED. . 
® 
ie THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
i AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
i CORPORATION. ® 
® 
® 
® 
w 
*® 
+ 


!* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USF OR _ RELIABILITY OF ITS 
:* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED ” DIGITAL. 


Lee REE EEEEREEEA AEE TEA ee eee 
! 


Modified by: 

v03-01 MmTROO06 Mike Rhodes ; 07-Jun-1982 — 

Add a new context flag for processing I1* immediate Literals. 

i v0203 MTROOO1 Mike Rhodes sheet -1981 

: — new context bit definition INIT_PAT_BIT te signify 

i hat the user had issued the FENITIAC IIE” qualifier to the 

: SE] PATCH_AREA command. Its also added to the command 

qualifier bit definitions. 

: vO202 CNHO013 Chris H 12-Sep-1979 14:00 

Increase maximum symbol “Length to 31 characters. 

i v0201 ets KATHLEEN D. MORSE 01-FEB-1979 15:00 

i rease size of Lexene buffers from 20 to 25 (CHS _PER_LEXEME). 

i. (PATGEN, REO v0201) 

MACRO 
ALONGWORD =0, 0, 32%, ! OFFSET, POSITION, AND SIZE FOR A LON 
NULL_POS SIZE =0, 0, O%, i NULL PSE FOR UNDOTTED REFERENCES TO 
TBIT-FIECD =, 1, O£. ' field in PSL containing the tbit 
OPERAND_MODE =0, 4, 4, 0%, ' MODE PART OF AN OPERAN 
OPERAND— VALUE =0, 0, 4, O02; ' VALUE PART OF AN OPERAND 


LITERAL 
ADD_THE_OF FSET 


" 
— 
- 


. ! ADD OFFSET TO VALUE 


1 


GWORD 
BLOCKS 


—————- 
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SUB_THE_OFFSET =0, 
'e¢ 


iv VALUES FOR REGISTER NAME 


REGISTER COUNT = 
REG_ENTRY_LEN =1, 


BYTES_PER_LONGW =4, 


A_BYTE =1, 
A"WORD =2. 
A~LONGWORD =4, 
A~QUADWORD =.) 
A~PAGE =5{2, 


lee 


| SIZE PARAMETERS 

NO_OF_INP_CHARS =132, 
CHS_PER_LEXEME =25, 
NO_OF_TOKENS =30, 


NUM_MAX_LENGTH 


iva) 
~< 
2. 
x 
> 
a. 
» 
mm 
m 
z 
i) 
—_" 
=x 
nun 


TABLES 


lee 
ASCII CHARACTER REPRESENTATIONS 


LINEFEED 
CARRIAGE_RET 
Ae Al ae oanen 
ASC” COMMA 


.* *. 


ASC_MINUS 
ASC_OPEN_PAREN 
asc_period 


-™@ee mis ~@® 


ASC~SQ_CLO_BRAK 
ASC_ SQ” OPN_BRAK 


asc_up_arrow 


! THE *MODE* DATA 
! A BYTE VECTOR wl 


MODE _LVL_SIZE =7, 
MODE-LEVELS =4, 


U 


ee ee a ee ae ts Bs es ee Bs Bs Be LTE) 
Te ee es te te et bt ht ee 


m— 
“xD 
om 


IS REAL 


16-SEP-1984 16:52:44.08 Page 2 
SUBTRACT OFFSET FROM VALUE 


Seventeen REGISTERS COUNTI 
LENGTH IN LONGWORDS OF AR 


BYTES PER VAX LONGWORD 


NG PSL 
EGISTER NAME ENTRY 


ADDRESS OFFSET FOR A BYTE 
ADDRESS OFFSET FOR A WORD 
ADDRESS OFFSET FOR A LONGWORD 
ADDRESS OFFSET FOR A QUADWORD 
ADDRESS OFFSET FOR A PAGE 


MAX NUMBER OF CHARACTERS IN INPUT LINE 
eeeeMUST BE DIVISIBLE BY 4** 

MAX NUMBER OF CHARACTERS IN A SINGLE LEXEME 
***MUST BE DIVISIBLE BY 4** 

MAX NUMBER OF TOKENS PERMITTED 

***MUST BE AN EVEN NUMBER*®*® 


MAXIMUM NUMBER OF CHARACTERS cee NUMERIC STRING 
MAXIMUM NUMBER OF CHARACTERS PER SYMBOL 
DIFFERENCE BETWEEN ASCII REPRESENTATION OF UPPER AND LOWER CASE 
OFFSET FROM NUMERIC VALUE TO ASCII VALUE 


ASCII REPRESENTATION OF LINEFEED 

ASCII REPRESENTATION OF CARRIAGE RETURN 

ASCI] REPRESENTATION OF AN AT SIGN 

ASCII REPRESENTATION OF CLOSED PARENTHESIS 

ASCII REPRESENTATION OF A COMMA 

ASCII REPRESENTATION OF A MINUS SIGN 

ASCI] REPRESENTATION OF OPEN PARENTHESIS 

ASCII representation of a Pross 

ASCII REPRESENTATION OF A LUS G 

ASCII] REPRESENTATION OF A POUNDS SIGN 

ASCII REPRESENTATION OF A QUOTE SC RABACTER 

ASCII] REPRESENTATION OF A S 

ASCII aeres tencel ioe OF . wiry SQUARE BRACKET 

ASCII] REPRESENTATION OF AN OPEN SQUARE BRACKET 
! ASCII REPRESENTATION OF A TAB 

ASCII representation of an up arrow 


Y JUST 
LLOWING. CHARACTERISTICS. 


! NUMBER OF BYTES IN EACH ‘LEVEL’. 


i NUMBER OF LEVELS FOR MODE SETTINGS 


PA 


PATGEN.REQ; 1 

! EACH LEVEL OF THE 

i THE FOLLOWING ENTR 

MODE _RADIX =0, 

MODE “LENGTH =3' i 

MODESYMBOLS  =2, 

MODE_INSTRUC = =3, ; 

MODE _ASCIi ta; | 

MODE _SCOPE 25, 
i 


MODE _GLOBALS =6, 


! THE FOUR LEVE 
! NAMES AND IND 


DEF AULT_MODE 

USER_DEF_MODE 
OVERRIDE MODE 
LOCAL _MOBE 


: THE MODE _LENGTH 


LS 
ICE 


IELD SHOULD BE 


BYTE_LENGTH =1, : 
WORD_-LENGTH =2, 4 
LONG_LENGTH =4, : 
! AND THE MODE_RADIX FIELD SHOULD 
DECIMAL _RADIX 

HEX _RADTX 


OETAL RADIX 
binary_radix 


nun 
mo-— 
ss GO 

es 


K 
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AS MACHINE. INSTRUCTI 
BOOLEAN => WH WE OUTPUT (ONLY!) 


ETHER 
VALUES AS ASCII STR Nes OR ft 
Whether or not there 
(and whether we should. apely Pte 
Whether or not we should apply 
global scope first in the search rules. 


—— THE FOLLOWING 


DEFAULT gi bal ig Ea MODE 
USER@SET DEFA MODE 

ONE=LINE OVERRIDE MODE 

LOCAL MODE 

ONE OF THE FOLLOWING 

BYTE LENGTH 

WORD LENGTH 

LONGWORD LENGTH 

BE ONE OF: 

DECIMAL RADIX 


ar tar Bioth RADIX 
OCTAL RADIX 


; aaa radix 


: THE DEFAULT SETTINGS (SEE PATSINIT_MODES IN PATMOD.B32) 


! FOR THE FIELDS ARE: 


DEF _MODE_RADIX =HEX_RADIX 
DEF-MODE-LENGTH =LONG_LENGTH, 


HEX IS DEFAULT RADIX 
LONG IS DEFAULT LENGTH 


* BIT CONFIGURATIONS FOR CONTEXT FLAGS. 


CONTEXT_BITS =32, 


E BIT =0, ! 
SET_ROT_ECO =1, ' 

IGN_L =§° : 
ALIGN~QUAD =5, ! 
ALIGN~WOR =4, ! 
ALIGN” PAGE =5, ! 
ALIGN_BYTE =6, ‘ 


NUMBER OF CONTEXT BITS 


MODE ssvuene BIT 
check not eco indica 
ALIGNMENT ON LONGWORD BOUNDARY 
ALIGNMENT ON QUADWORD BOUNDARY 
0 RD BOUNDARY 


ALIGNMENT ON BYTE BOUNDARY 


PATGEN 


LITERAL 


MACRO 
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MODULE _BIT =7, ' MODULE KEYWORD BIT 

EXAMINE _BIT =8; ! EXAMINE COMMAND 

OVERRIDE =10, ' OVERRIDE HAS BEEN SET 

SCOPE_BI =16, ' Command was SET SCope. 

INIT _PAT_BIT =17, ! ZINITIALIZE indicator 

SET_ECO =18, ' SETTING ECO LEVEL OF THIS PATCH 
PAT AREA BIT =19, ' PATCH AREA INDICATO 

INST_SuUBST =20, ' ENABLE INSTRUCTION SUBSTITUTION 
VERIFY_BIT =21, ! VERIFY COMMAND BIT 

DELETE BIT = ¢ ' DELETE COMMAND BIT 

INSERT “BIT =23, ! INSERT COMMAND BIT 

OPN_COM_F ILE =24, ' OPEN COMMAND FILE BIT 

OT ERAL— BIT =25, ! /LITERAL INDICATOR 

1. 1_HAT ASEEN =26, ! PROCESS I1* immediate mode operand in context. 
QUALIFIER BITS FOR COMMAND LINE QUALIFIERS 

MIN_QUAL = 0, ' MINIMUM QUALIFIER BIT USED 
INSTR _QUAL = 0, ! /INSTRUCTION 

DECIMAL_QUAL = 1, ' /DECI 

WORD_QUAL = ¢ ! 

BYTE QUAL = 5, ' /BY 

PATCA_QUAL = 4, ' /PATCH_AREA 

NOINSTR QUAL = 5, ' /NOINSTRUCTION 

LONG QUAL = 6, ' /LONG 

HEX _GUAL = 7, ' /HEX 

ASCTI_QUAL = 8, ' /ASCII 

NOASCTI QUAL = 9 ' /NOASCII 

OCTAL_QOAL = 16, i /OCTAL 

LITER- QUAL s 11, ' /LITERAL 

INATIALIZE QUAL = 12, ' VINITIA LIZE 

MAX_QUAL = 12, ! MAXIMUM QUALIFIER BIT USED 
LOCATION TYPES FOR END RANGE ARGUMENTS 

MEMORY _LOC =0, ' MEMORY LOCATION 

REGISTER_LOC =1; ' REGISTER LOCATION 

lee 

' OUT_DIAG_INFO OUTPUTS A DIAGNOSTIC MESSAGE TO THE TERMINAL. THIS 


: a hy CAR, BE REDEFINED TO NULL WHEN THE DEBUGGER SEEMS TO FUNCTION 
4 _MORE OR LESS AS DESIGNED. 


OUT_DIAG INFO (MESSAGE) = 


coer out ("!7'!AC!/", UPLIT BYTE (ZCHARCOUNT (MESSAGE), ZASCII MESSAGE)); 


PATGEN.REQ - Last Line 


ee ee 
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